unit qmoonreg;
(*$define clx *)
(*$i moon_reg.pas *)

(*@\\\000F00040100040100010E00001100010E*)
